object FormCodeP: TFormCodeP Left = 559 Top = 81 BorderStyle = bsDialog Caption = 'Editer les codes postaux' ClientHeight = 371 ClientWidth = 538 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object SC_Line5: TSC_Line Left = 0 Top = 337 Width = 538 Height = 34 BorderShape = bsTopLine Align = alBottom end object Label1: TLabel Left = 12 Top = 18 Width = 80 Height = 14 Caption = 'Trouver une ville' Transparent = True end object Label2: TLabel Left = 12 Top = 39 Width = 80 Height = 14 Caption = 'Trouver un code' Transparent = True end object Label3: TLabel Left = 12 Top = 63 Width = 116 Height = 14 Caption = 'Trouver un d'#233'partement' Transparent = True end object LabelCount: TLabel Left = 267 Top = 70 Width = 54 Height = 14 Caption = 'LabelCount' end object ButtonOk: TButton Left = 180 Top = 344 Width = 75 Height = 22 Caption = '&Ok' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ModalResult = 1 ParentFont = False TabOrder = 7 end object ButtonCancel: TButton Left = 265 Top = 344 Width = 75 Height = 22 Cancel = True Caption = '&Annuler' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ModalResult = 2 ParentFont = False TabOrder = 8 end object EditVille: TEdit Left = 135 Top = 12 Width = 121 Height = 22 CharCase = ecUpperCase TabOrder = 0 OnChange = EditVilleChange end object GridCode: TStringGrid Left = 12 Top = 95 Width = 433 Height = 228 ColCount = 3 DefaultColWidth = 100 DefaultRowHeight = 16 FixedCols = 0 RowCount = 1 FixedRows = 0 Options = [goRowSelect, goThumbTracking] PopupMenu = PopupMenu1 ScrollBars = ssVertical TabOrder = 3 OnDblClick = Modifiercenom1Click OnDrawCell = GridCodeDrawCell end object ButtonAdd: TButton Left = 451 Top = 96 Width = 75 Height = 22 Hint = 'Ajouter une entr'#233'e' Caption = '&Ajouter' TabOrder = 4 OnClick = Ajouterunnom1Click end object ButtonMod: TButton Left = 451 Top = 126 Width = 75 Height = 22 Hint = 'Modifier cette entr'#233'e' Caption = '&Modifier' TabOrder = 5 OnClick = Modifiercenom1Click end object ButtonDell: TButton Left = 451 Top = 156 Width = 75 Height = 22 Hint = 'Supprimer cette entr'#233'e' Caption = '&Supprimer' TabOrder = 6 OnClick = Supprimercenom1Click end object EditCode: TEdit Left = 135 Top = 36 Width = 121 Height = 22 TabOrder = 1 OnChange = EditCodeChange end object EditDep: TEdit Left = 135 Top = 60 Width = 121 Height = 22 TabOrder = 2 OnChange = EditDepChange end object PopupMenu1: TPopupMenu OnPopup = PopupMenu1Popup Left = 156 Top = 126 object Ajouterunnom1: TMenuItem Caption = 'Ajouter un nom' OnClick = Ajouterunnom1Click end object N1: TMenuItem Caption = '-' end object Modifiercenom1: TMenuItem Caption = 'Modifier ce nom' OnClick = Modifiercenom1Click end object N2: TMenuItem Caption = '-' end object Supprimercenom1: TMenuItem Caption = 'Supprimer ce nom' OnClick = Supprimercenom1Click end end end